home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / gentoo_GLSA-200501-38.nasl < prev    next >
Text File  |  2005-03-31  |  3KB  |  70 lines
  1. # This script was automatically generated from 
  2. #  http://www.gentoo.org/security/en/glsa/glsa-200501-38.xml
  3. # It is released under the Nessus Script Licence.
  4. # The messages are release under the Creative Commons - Attribution /
  5. # Share Alike license. See http://creativecommons.org/licenses/by-sa/2.0/
  6. #
  7. # Avisory is copyright 2001-2005 Gentoo Foundation, Inc.
  8. # GLSA2nasl Convertor is copyright 2004 Michel Arboi
  9.  
  10. if (! defined_func('bn_random')) exit(0);
  11.  
  12. if (description)
  13. {
  14.  script_id(16429);
  15.  script_version("$Revision: 1.1 $");
  16.  script_xref(name: "GLSA", value: "200501-38");
  17.  
  18.  desc = 'The remote host is affected by the vulnerability described in GLSA-200501-38
  19. (Perl: rmtree and DBI tmpfile vulnerabilities)
  20.  
  21.  
  22.     Javier Fernandez-Sanguino Pena discovered that the DBI library creates
  23.     temporary files in an insecure, predictable way (CAN-2005-0077). Paul
  24.     Szabo found out that "File::Path::rmtree" also handles temporary files
  25.     insecurely (CAN-2004-0452).
  26.   
  27. Impact
  28.  
  29.     A local attacker could create symbolic links in the temporary files
  30.     directory that point to a valid file somewhere on the filesystem. When
  31.     the DBI library or File::Path::rmtree is executed, this could be used
  32.     to overwrite files with the rights of the user calling these functions.
  33.   
  34. Workaround
  35.  
  36.     There are no known workarounds at this time.
  37.   
  38. References:
  39.     http://www.cve.mitre.org/cgi-bin/cvename.cgi?name=CAN-2005-0077
  40.     http://www.cve.mitre.org/cgi-bin/cvename.cgi?name=CAN-2004-0452
  41.  
  42.  
  43. Solution: 
  44.     All Perl users should upgrade to the latest version:
  45.     # emerge --sync
  46.     # emerge --ask --oneshot --verbose dev-lang/perl
  47.     All DBI library users should upgrade to the latest version:
  48.     # emerge --sync
  49.     # emerge --ask --oneshot --verbose dev-perl/DBI
  50.   
  51.  
  52. Risk factor : Medium
  53. ';
  54.  script_description(english: desc);
  55.  script_copyright(english: "(C) 2005 Michel Arboi");
  56.  script_name(english: "[GLSA-200501-38] Perl: rmtree and DBI tmpfile vulnerabilities");
  57.  script_category(ACT_GATHER_INFO);
  58.  script_family(english: "Gentoo Local Security Checks");
  59.  script_dependencies("ssh_get_info.nasl");
  60.  script_require_keys('Host/Gentoo/qpkg-list');
  61.  script_summary(english: 'Perl: rmtree and DBI tmpfile vulnerabilities');
  62.  exit(0);
  63. }
  64.  
  65. include('qpkg.inc');
  66. if (qpkg_check(package: "dev-lang/perl", unaffected: make_list("ge 5.8.6-r2", "rge 5.8.5-r3", "rge 5.8.4-r2", "rge 5.8.2-r2"), vulnerable: make_list("le 5.8.6-r1")
  67. )) { security_warning(0); exit(0); }
  68. if (qpkg_check(package: "dev-perl/DBI", unaffected: make_list("rge 1.37-r1", "ge 1.38-r1"), vulnerable: make_list("le 1.38")
  69. )) { security_warning(0); exit(0); }
  70.